home *** CD-ROM | disk | FTP | other *** search
/ The Word 17 / The Word 17 (Disk 2 of 2).adf / Install.s < prev   
Text File  |  1998-01-07  |  3KB  |  116 lines

  1.  
  2. ;  Harddrive Install for The Word 17...
  3.  
  4. Echo "*Ec"
  5. Echo " This script will attempt to install issue 17 of The Word"
  6. Echo " to your harddrive, do you wish to continue (y/n)?" NOLINE
  7. Ask ""
  8.  
  9. If NOT WARN
  10.     Echo "Terminating Installation"
  11.     Skip FINISHED
  12. Endif
  13.  
  14. Echo " "
  15. Echo " Now you will be asked to select a  destination  for  The"
  16. Echo " Word, a directory (called 'Word_17') will be created and"
  17. Echo " the  magazine  will  be installed there, press return to"
  18. Echo " continue..." NOLINE
  19. Ask ""
  20.  
  21. Failat 21
  22.  
  23. Echo >Ram:TW.temp0 "Assign >Nil: TWTemp: " NOLINE
  24. RequestFile >>Ram:TW.temp0 "" PATTERN "" TITLE "Hmmm" POSITIVE "Do it!" DRAWERSONLY NOICONS
  25. Execute >Nil: Ram:TW.temp0
  26. Delete >Nil: Ram:TW.temp0
  27.  
  28. ;----------------------------------- Directory Assign Failed...
  29. Assign >Nil: TWTemp: EXISTS
  30. If WARN
  31.     Echo " FAILED! - Installation was unable to Find"
  32.     Echo "           and Assign Requested Directory!"
  33.     Skip FINISHED
  34. Endif
  35.  
  36. ;------------------------------------ Create Destination Dirs...
  37. Makedir TWTemp:Word_17
  38. Makedir TWTemp:Word_17/Files
  39. Makedir TWTemp:Word_17/Files/Setup
  40. ;------------------------------------ Create icons...
  41. If EXISTS "ENVARC:Sys/def_drawer.info"
  42.     Copy "ENVARC:Sys/def_drawer.info" TWTemp:Word_17.info
  43. Endif
  44.  
  45. ;------------------------------------ Wait for Disk 1 in any drive
  46. Assign >Nil: CRN-TW17a: EXISTS
  47. If WARN
  48.     Echo "*n Waiting for disk 1" NOLINE
  49.     Lab DISK1
  50.     Assign >Nil: CRN-TW17a: EXISTS
  51.     If WARN
  52.         Wait 2
  53.         Echo "." NOLINE
  54.         Skip DISK1 BACK
  55.     Endif
  56.     Echo " "
  57. Endif
  58.  
  59. ;------------------------------------ Copy main files etc...
  60. Wait 1
  61. Echo "*n Accessing Disk 1*n"
  62.  
  63. Echo "Copying Main Executable..." NOLINE
  64. Copy "CRN-TW17a:Word.exe#?" "TWTemp:Word_17/" QUIET
  65. Echo "Done"
  66.  
  67. Echo "Copying the Articles..." NOLINE
  68. Copy "CRN-TW17a:Files/#?" ALL "TWTemp:Word_17/Files/" QUIET
  69. Echo "Done"
  70.  
  71. Echo "Copying the Fonts..." NOLINE
  72. Copy "CRN-TW17a:Fonts/#?" ALL FONTS: QUIET
  73. Echo "Done"
  74.  
  75. ;------------------------------------ Wait for Disk 2 in any drive
  76. Assign >Nil: CRN-TW17b: EXISTS
  77. If WARN
  78.     Echo "*n Waiting for disk 2" NOLINE
  79.     Lab DISK2
  80.     Assign >Nil: CRN-TW17b: EXISTS
  81.     If WARN
  82.         Wait 2
  83.         Echo "." NOLINE
  84.         Skip DISK2 BACK
  85.     Endif
  86.     Echo " "
  87. Endif
  88.  
  89. ;------------------------------------ Copy main files etc...
  90. Wait 1
  91. Echo "*n Accessing Disk 2*n"
  92.  
  93. Echo "Copying the Articles..." NOLINE
  94. Copy "CRN-TW17b:Files/#?" ALL "TWTemp:Word_17/Files/" QUIET
  95. Echo "Done"
  96.  
  97. Echo "Copying the Article Tester..." NOLINE
  98. Copy "CRN-TW17b:TWAT#?" "TWTemp:Word_17/" QUIET
  99. Echo "Done"
  100.  
  101. Wait 2
  102.  
  103. CD TWTemp:
  104. Echo "*n Your copy of The Word issue 17 is now installed in"
  105. Echo " the directory " NOLINE
  106. CD
  107.  
  108. Assign TWTemp: DISMOUNT
  109. Echo "*n You do not need to make any assigns but we would"
  110. Echo " Recommend a utility like FreakBoot or BootSelect"
  111. Echo " is used to maximise your CHIP RAM."
  112. Ask "*n Press Return..."
  113.  
  114. Lab FINISHED
  115. EndCLI >Nil:
  116.